Viết chương trình nhập vào N, dãy số nguyên A1, A2…An(N<=100). Tìm giá trị lớn nhất và vị trí của nó trong dãy.
Những câu hỏi liên quan
Viết chương trình nhập vào dãy số nguyên a1,a2....an (n
Viết chương trình nhập vào dãy số nguyên dương A1,A2,...An ( n
viết chương trình nhập vào 1 dãy dố nguyên : a1,a2...an(n
viết chương trình nhập vào các số nguyên dương N,dãy a1,a2 ,...an đưa ra số lượng số lẻ và số chẵn có trong dãy
n = int(input("Nhập số phần tử của dãy: "))
a = [ ]
# đếm số chẵn
even_count = 0
# đếm số lẻ
odd_count = 0
for i in range(n):
a.append(int(input("Nhập phần tử thứ {0}: ".format(i+1))))
for i in a:
if i % 2 == 0:
even_count += 1
else:
odd_count += 1
print("Số lượng số chẵn trong dãy: ", even_count)
print("Số lượng số lẻ trong dãy: ", odd_count)
Đúng 1
Bình luận (0)
n = int(input("Nhập số phần tử của dãy: "))
a = [ ]
# đếm số chẵn
even_count = 0
# đếm số lẻ
odd_count = 0
for i in range(n):
a.append(int(input("Nhập phần tử thứ {0}: ".format(i+1))))
for i in a:
if i % 2 == 0:
even_count += 1
else:
odd_count += 1
print("Số lượng số chẵn trong dãy: ", even_count)
print("Số lượng số lẻ trong dãy: ", odd_count)
Đúng KO Ạ MK KO CHẮC
Đúng 0
Bình luận (0)
viết chương trình nhập vào dãy A gồm n số nguyên A1 , A2 ...An . (n<=100) đưa ra màn dãy B gồm các phần tử là số chẵn trong dãy A
Viết chương trình nhập vào số nguyên dương N và dãy gồm N số nguyên A1,A2,...,AN và số nguyên k.Đếm xem trong dãy có bao nhiêu phần tử có giá trị bằng k
uses crt;
var a:array[1..100]of integer;
i,n,dem,k:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap k='); readln(k);
dem:=0;
for i:=1 to n do
if a[i]=k then inc(dem);
writeln('Trong day co ',dem,' phan tu co gia tri bang ',k);
readln;
end.
Đúng 1
Bình luận (1)
bài 1 viết chương trình nhập vào từ bàn phím n và dãy số nguyên a1,a2,..,an (0<n<100)
a. In dãy số vừa nhập ra màn hình theo thứ tự ngược lại
b. Kiểm tra xem dãy a1,a2,...,an có phải là dãy số đối xứng hay không?biết dãy số đối xứng là dãy đọc từ trái qua phải cũng giống đọc từ phải qua trái
n = int(input("Nhập n: "))
a = [ ]
for i in range(n):
a.append(int(input(f"Nhập phần tử a[{i}]: ")))
print("Dãy số vừa nhập:")
# In dãy số theo thứ tự ngược lại
print(a[::-1])
if a == a[::-1]:
print("Dãy số là dãy đối xứng")
else:
print("Dãy số không phải là dãy đối xứng")
Đúng 0
Bình luận (0)
cho dãy số nguyên a1, a2,.. an (ai < 10 mũ 9; 0<n< hoặc bằng 50 Viết chương trình nhập và xuất dãy số vừa nhập
uses crt;
var a:array[1..50]of longint;
i,n:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
for i:=1 to n do write(a[i]:4);
readln;
end.
Đúng 2
Bình luận (0)
viết chương trình để nhập vào một dãy n số nguyên a1, a2, ..., an . đếm các số chia hết cho 3 trong mảng và hiển thị ra màn hình
Xem chi tiết
uses crt;
var a:array[1..100]of integer;
i,n,dem:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
dem:=0;
for i:=1 to n do
if a[i] mod 3=0 then inc(dem);
writeln(dem);
readln;
end.
Đúng 2
Bình luận (1)